# name : ggsurvfit::survfit2, Kaplan-Miere/KM estimate
# key : ggsurvfit_survfit2
# contributor: Shuguang Sun
# --
${99:kmfit} <- ggsurvfit::survfit2(
Surv(${1:AVAL}, ${2:EVENT}) ~ ${3:TRT01P + strata(HISTCAT)},
data = ${4:data},
conf.type = \"${5:$$(yas-choose-value '("log-log" "plain" "log" "none" "logit" "arcsin"))}\"
)
summary($99, times = c($0))$$table
